home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / nt / gd25s.zip / MKINSTAL < prev    next >
Text File  |  1993-10-08  |  654b  |  36 lines
  1. #!/bin/sh
  2. # Make directory hierarchy. 
  3. # Written by Noah Friedman <friedman@prep.ai.mit.edu>
  4. # Public domain.
  5.  
  6. defaultIFS='     
  7. '
  8. IFS="${IFS-${defaultIFS}}"
  9.  
  10. errstatus=0
  11.  
  12. for file in ${1+"$@"} ; do 
  13.    oIFS="${IFS}"
  14.    # Some sh's can't handle IFS=/ for some reason.
  15.    IFS='%'
  16.    set - `echo ${file} | sed -e 's@/@%@g' -e 's@^%@/@'`
  17.    IFS="${oIFS}"
  18.  
  19.    pathcomp=''
  20.  
  21.    for d in ${1+"$@"} ; do
  22.      pathcomp="${pathcomp}${d}"
  23.  
  24.      if test ! -d "${pathcomp}"; then
  25.         echo "mkdir $pathcomp" 1>&2
  26.         mkdir "${pathcomp}" || errstatus=$?
  27.      fi
  28.  
  29.      pathcomp="${pathcomp}/"
  30.    done
  31. done
  32.  
  33. exit $errstatus
  34.  
  35. # eof
  36.